home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / imagview.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  1.1 KB  |  31 lines

  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------
  6. #include <vcl.h>
  7. #pragma hdrstop
  8. //----------------------------------------------------------------------------
  9. USEFILE("readme.txt");
  10. USEFORM("imagewn.cpp", ImageForm);
  11. USEFORM("ViewFrm.cpp", ViewFrm);
  12. USERES("imagview.res");
  13. //----------------------------------------------------------------------------
  14. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  15. {
  16.     try
  17.     {
  18.     Application->Initialize();
  19.     Application->CreateForm(__classid(TImageForm), &ImageForm);
  20.     Application->CreateForm(__classid(TViewFrm), &ViewFrm);
  21.     Application->Run();
  22.    }
  23.    catch (Exception &exception)
  24.    {
  25.       Application->ShowException(&exception);
  26.    }
  27.  
  28.     return 0;
  29. }
  30. //---------------------------------------------------------------------
  31.